#pragma once

#include <iostream>
#include <string>
#include <cstring>
#include <sys/types.h>
#include <sys/socket.h>
#include <netinet/in.h>
#include <arpa/inet.h>
#include <functional>
#include <unordered_map>
#include "Log.hpp"

uint16_t defaultport = 8888;
std::string defaultip = "0.0.0.0";
const size_t size = 1024;
Log lg;

typedef std::function<std::string(const std::string &, const std::string &, const uint16_t &)> func_t;

enum
{
    SOCKET_ERR = 0,
    BIND_ERR
};

class UdpServer
{
public:
    UdpServer(const uint16_t &port = defaultport, const std::string &ip = defaultip)
        : _sockfd(0), _ip(ip), _port(port), _isrunning(false)
    {
    }

    void Init()
    {
        // 1. 创建udp socket
        // 2. Udp 的socket是全双工的，允许被同时读写的
        _sockfd = socket(AF_INET, SOCK_DGRAM, 0);
        if (_sockfd < 0)
        {
            lg(Fatal, "ocket create error, sockfd: %d\n", _sockfd);
            exit(SOCKET_ERR);
        }
        lg(Info, "socket create success, sockfd: %d\n", _sockfd);
        // 2. bind socket
        struct sockaddr_in local;
        bzero(&local, sizeof(local));
        local.sin_family = AF_INET;
        local.sin_addr.s_addr = inet_addr(_ip.c_str());
        local.sin_port = htons(_port);

        if (bind(_sockfd, (struct sockaddr *)&local, sizeof(local)) < 0)
        {
            lg(Fatal, "bind error, errno: %d, err string: %s", errno, strerror(errno));
            exit(BIND_ERR);
        }
        lg(Info, "bind success, errno: %d, err string: %s", errno, strerror(errno));
    }

    void CheckUser(const struct sockaddr_in &client, const std::string clientip, uint16_t clientport)
    {
        auto iter = _onlineuser.find(clientip);
        if (iter == _onlineuser.end())
        {
            _onlineuser.insert({clientip, client});
            std::cout << "[" << clientip << ":" << clientport << "] add to online user." << std::endl;
        }
    }

    void Broadcast(const std::string &info, const std::string clientip, uint16_t clientport)
    {

        for (const auto &user : _onlineuser)
        {
            std::string message = "[";
            message += clientip;
            message += ":";
            message += std::to_string(clientport);
            message += info;
            socklen_t len = sizeof(user.second);
            sendto(_sockfd,message.c_str(),message.size(),0,(struct sockaddr *)(&user.second),len);
        }
    }
    void Run()
    {
        _isrunning = true;
        char inbuffer[size];
        while (_isrunning)
        {
            struct sockaddr_in client;
            socklen_t len = sizeof(client);
            ssize_t n = recvfrom(_sockfd, inbuffer, sizeof(inbuffer) - 1, 0, (struct sockaddr *)&client, &len);
            if (n < 0)
            {
                lg(Warning, "recvfrom error, errno: %d, err string: %s", errno, strerror(errno));
                continue;
            }

            uint16_t clientport = ntohs(client.sin_port);
            std::string clientip = inet_ntoa(client.sin_addr);
            CheckUser(client, clientip, clientport);

            std::string info = inbuffer;
            Broadcast(info, clientip, clientport);

            // inbuffer[n] = 0;
            // std::string info = inbuffer;
            // std::string echo_string = func(info, clientip, clientport);
            // sendto(_sockfd, echo_string.c_str(), echo_string.size(), 0, (struct sockaddr *)&client, len);
        }
    }

    ~UdpServer()
    {
        if (_sockfd > 0)
            close(_sockfd);
    }

private:
    int _sockfd;     // 网路文件描述符
    std::string _ip; // 任意地址bind 0
    uint16_t _port;  // 表明服务器进程的端口号
    bool _isrunning;
    std::unordered_map<std::string, struct sockaddr_in> _onlineuser;
};

// class UdpServer{
// public:
//     UdpServer(const uint16_t &port = defaultport, const std::string &ip = defaultip):sockfd_(0), port_(port), ip_(ip),isrunning_(false)
//     {}
//     void Init()
//     {
//         // 1. 创建udp socket
//         // 2. Udp 的socket是全双工的，允许被同时读写的
//         sockfd_ = socket(AF_INET, SOCK_DGRAM, 0); // PF_INET
//         if(sockfd_ < 0)
//         {
//             lg(Fatal, "socket create error, sockfd: %d", sockfd_);
//             exit(SOCKET_ERR);
//         }
//         lg(Info, "socket create success, sockfd: %d", sockfd_);
//         // 2. bind socket
//         struct sockaddr_in local;
//         bzero(&local, sizeof(local));
//         local.sin_family = AF_INET;
//         local.sin_port = htons(port_); //需要保证我的端口号是网络字节序列，因为该端口号是要给对方发送的
//         local.sin_addr.s_addr = inet_addr(ip_.c_str()); //1. string -> uint32_t 2. uint32_t必须是网络序列的 // ??
//         // local.sin_addr.s_addr = htonl(INADDR_ANY);

//         if(bind(sockfd_, (const struct sockaddr *)&local, sizeof(local)) < 0)
//         {
//             lg(Fatal, "bind error, errno: %d, err string: %s", errno, strerror(errno));
//             exit(BIND_ERR);
//         }
//         lg(Info, "bind success, errno: %d, err string: %s", errno, strerror(errno));
//     }
//     void CheckUser(const struct sockaddr_in &client, const std::string clientip, uint16_t clientport)
//     {
//         auto iter = online_user_.find(clientip);
//         if(iter == online_user_.end())
//         {
//             online_user_.insert({clientip, client});
//             std::cout << "[" << clientip << ":" << clientport << "] add to online user." << std::endl;
//         }
//     }

//     void Broadcast(const std::string &info, const std::string clientip, uint16_t clientport)
//     {
//         for(const auto &user : online_user_)
//         {
//             std::string message = "[";
//             message += clientip;
//             message += ":";
//             message += std::to_string(clientport);
//             message += "]# ";
//             message += info;
//             socklen_t len = sizeof(user.second);
//             sendto(sockfd_, message.c_str(), message.size(), 0, (struct sockaddr*)(&user.second), len);
//         }
//     }

//     void Run() // 对代码进行分层
//     {
//         isrunning_ = true;
//         char inbuffer[size];
//         while(isrunning_)
//         {
//             struct sockaddr_in client;
//             socklen_t len = sizeof(client);
//             ssize_t n = recvfrom(sockfd_, inbuffer, sizeof(inbuffer) - 1, 0, (struct sockaddr*)&client, &len);
//             if(n < 0)
//             {
//                 lg(Warning, "recvfrom error, errno: %d, err string: %s", errno, strerror(errno));
//                 continue;
//             }
            
//             uint16_t clientport = ntohs(client.sin_port);
//             std::string clientip = inet_ntoa(client.sin_addr);
//             CheckUser(client, clientip, clientport);

//             std::string info = inbuffer;
//             Broadcast(info,clientip, clientport);
//         }
//     }
//     ~UdpServer()
//     {
//         if(sockfd_>0) close(sockfd_);
//     }
// private:
//     int sockfd_;     // 网路文件描述符
//     std::string ip_; // 任意地址bind 0
//     uint16_t port_;  // 表明服务器进程的端口号
//     bool isrunning_;
//     std::unordered_map<std::string, struct sockaddr_in> online_user_;
// };
